Appendix D 



Event Table 

Event: Program Startup 



0 



Gui Action 


COM Object Method 


Base Object Method 


Read configuration file for 
workstation settings 






Create and initialize global 
objects 






Create an instance of CCRWDoc 


New CCRWDoc 

CCRWDoc creates its associated 
Base 
objects 


new CMasterDoc 
newClmpExpDoc 
new CUser 


Request a connection to the 
database 


CCRWDoc.Connect(ODBCDataS 
ource) 

Call CMasterDoc to make the 
connection 


CMasterDoc.Connect(ODBCData 
Source) 


Login to the database 


CCRWDoc.DbLogon(Dbllserld, 

DbPasswd) 
Call CMasterDoc to login to the 

database 


CMasterDoc DbLogon(DbUser, 
DbPasswd) 


Log the user on to the AJjfe 
system 


CCRWDoc.SysLogon(Userld, 

Passwd) 
Call CMasterUoc to log the user 

on 


CUser.SysLogon(Userld, 
rasswd) 


Verify the DB schema matches 
the app version 

If incompatible schema then 

Exit application 
[end if] 


CCRWDoc.GetSchemaVersion( 

MyVersion) 
Get the Schema Version from the 

CUser object 


CUser.GetSchemaVersion() 


oreaie an msiance oi uvvorKU 


INcW L/VVOrKw 




Create an instance of CLookup 


New CLookup 




Populate 'Payer Class' static list 


CLookup.SetModefPayer 

Class") 
CLookup.GetRowCount() 
CLookup.Search() 
While more rows do 
CLookup.GetNext() 
[done] 




Populate 'EM Level 1 static lists 


For each of (HPI, ROS, PFSH, 
EXAM, DATA, DMO, 
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RISK, MDM) do 
CLookup.SetMode({EM Level 
type}) 

CLookup.GetRowCount() 
CLookup.Search() 
While more rows do 
CLookup.GetNext() 
[done] 
[done] 




Display current document list 


CWorkQ.Show() 




Event: Logon Command 


Gui Action 


COM Object Method 


Base Object Method 


If there is a document open then 

cmdClose.DoCommand 
[end if] 






If a user is still logged on then 
Log that user off of the A-Life 
system 


CCRWDoc.SysLogoff() 

Call the CUser to log the user off 


CUser.SysLogoff() 


[end if] 






Log the user on to the AJJfe 
system 


CCRWDoc. SysLogon(Userld, 

Passwd) 
Call the CUser to log the user on 


CUser.SysLogon(Userld, 
Passwd) 


Display current document list 


CWorkQ.ShowQ 




Event: Logoff Command 


Gui Action 


COM Object Method 


Base Object Method 


cmdLogon.DoCommand 






Event: Open Document Event (Open Document Command) 


Gui Action 


COM Object Method 


Base Object Method 


Get the selected document ID 


CWorkQ.GetDocldCurrentO 




Get the number of documents in 
the Queue 


CWorkQ.GetRowCount() 




Open the selected document 


CCRWDocOpen(Docld) 
Use the ClnpExpDoc object to 

open the doc 
Set the CMasterDoc in 'EDIT" 

mode 


ClnpExpDoc.Get((&CMasterDoc, 
Docld) 

CMasterDoc.SetMode( u EDIT n ) 


If the document is locked then 
display 'Locked Document' 

message 
If request came from document 
list then 
exit to document list 
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else 'request came from Next 
Doc button 
do Next Doc command 
[end if] 
[end if] 






Hide the document list 


CWorkQ.HideO 




Populate the document form(s) 

with field values 
CCRWDoc.RefreshAIIQ 


CCRWDoc.GetAIIFieldsO 
Get all fields from the 
CMasterDoc 


CMasterDoc.GetAIIFieldsQ 


Event: Document Review Bitmap Clicked 


Gui Action 


COM Object Method 


Base Object Method 


bmpDocReview.toggle() 
Update the document object 


CCRWDoc.SetFieldfDocReview" 

. {toggle}) 

Update the field in the 
CMasterDoc 


CMasterDoc.SetField("DocRevie 
w", {toggle}) 


Event: Nurse's Notes Check B 


►ox Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetFieldfNursesNote 

s", {toggle}) 
Update the field in the 

CMasterDoc 


CMasterDoc.SetField("NursesNot 
es", {toggle}) 


Event: Close Document Button Pushed (Document Close Command) 


Gui Action 


COM Object Method 


Base Object Method 


If the document has been 
changed then 
Ask if the document should be 
saved 

If the answer is yes then 
Save the document 

[end if] 
[end if] 


CCRWDoc.Save() 
Use the ClnpExpDoc object to 
save the doc 


ClnpExpDoc.Set(&CMasterDoc) 


Close the document 


CCRWDoc.Close() 

Delete the current CMasterDoc 

object 
Create a new "clean" 

CMasterDoc object 


delete CMasterDoc 
new CMasterDoc 


Display current document list 


CWorkQ.ShowQ 
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Event: Program Shutdown 



Gui Action 


COM Object Method 


Base Object Method 


If there is a document open then 
Execute the Document Close 
command 

[end if] 






If a user is still logged on then 
Log that user off of the A-Life 
system 


CCRWDoc.SysLogoff() 

Call the CUser to log the user off 


CUser.SysLogoff() 


[end if] 






Logoff the database 


CCRWDoc.DbLogoff() 
Call the CMasterDoc to log off 
the database 


CMasterDoc.DbLogoff() 


Disconnect from the database 


CCRWDoc.Disconnect() 

Call the CMasterDoc to diconnect 


CMasterDoc.Disconnectf) 


Delete the CCRWDoc instance 


delete CCRWDoc 

CCRWDoc deletes its associated 

base 

objects 


delete CMasterDoc 
delete C ImpExpDoc 
delete CUser 


Delete the CWorkQ instance 


delete CWorkQ 




Exit the application 






Event: Next Document Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Save the document (don't ask) 


CCRWDoc.Save() 
Use the ClnpExpDoc object to 
save the doc 


ClnpExpDoc.Set(&CMasterDoc) 


Close the current document 


CCRWDoc.Close() 

Delete the current CMasterDoc 

object 
Create a new "clean" 

CMasterDoc object 


delete CMasterDoc 
new CMasterDoc 


Tell the WorkQ to move to the 
next document 


CWorkQ.GetNextDocQ 




Execute the Document Open 
command 






Event: Previous Document Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Save the document (don't ask) 


CCRWDoc.SaveO 


ClnpExpDoc.Set(&CMasterDoc) 


Close the current document 


CCRWDoc.Close() 
Delete the current CMasterDoc 
object 


delete CMasterDoc 
new CMasterDoc 
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Create a new "clean" 

CMasterDoc object 




Tell the WorkQ to move to the 
previous document 


CWorkQ.GetPrevDocQ 




Execute the Document Open 
command 






Section: Demographics 
Event: Highlight Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get the highlight coordinates 


CCRWDoc.GetHighlights(Fieldld) 
Get field highlights from the 
CMasterDoc 


CMasterDoc. 

GetHighlights(Fieldld) 


frmTranscript.SetHighlight(Highlig 
htArray) 






frmTranscript.RefreshQ 






Event: Text Field Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetField(Fieldld, 

Value) 
Update the CMasterDoc 


CMasterDoc.SetField(Fieldld, 
Value) 


frmDemog.DirtyFlag = TRUE 






Event: Gender Option Button Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetField(Fieldld, 

Value) 
Update the CMasterDoc 


CMasterDoc.SetField(Fieidld, 
Value) 


frmDemog.DirtyFlag = TRUE 






Event: Age Combo Box Chan 


ged 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetFieldfFieldld, 

Value) 
Update the CMasterDoc 


CMasterDoc.SetField(Fieldld, 
Value) 


frmDemog.DirtyFlag = TRUE 






Event: Undo Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get original values from the 
document object 


CCRWDoc.GetOrigFields(Fieldld 

Array) 
Get the fields from the 

CMasterDoc 


CMasterDoc.GetOrigFields(Fieldl 
dArray) 
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frmDemog .DirtyFlag = FALSE 






frmDemog.RefreshQ 







Section: EM Components 
Event: Combo Box Changed 



Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetField(Fieldld, 

Value) 
Update the CMasterDoc 


CMasterDoc.SetField(Fieldld, 
Value) 




If the result indicates the need to 
recalc EM 
Request the CMasterDoc do 
recalc 

[end if] 


CMasterDoc.EmRecalcO 


If result indicates EM recalc was 
done then 
Get original values from the 
document object 

frmEM.Refresh() 'refresh the 
form's fields 

[end if] 


CCRWDoc.GetOrigFields(Fieldld 

Array) 
Get the fields from the 

CMasterDoc 


CMasterDoc.GetOrigFields(Fieldl 
dArray) 


frmEM.DirtyFlag = TRUE 






Event: Undo Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get original values from the 
document object 


CCRWDoc.GetOrigFields(Fieldld 

Array) 
Get the fields from the 

CMasterDoc 


CMasterDoc.GetOrigFields(Fieldl 
dArray) 


frmEM.DirtyFlag = FALSE 






frmEM.RefreshO 






Section: EM Sub-Components 
Event: Highlight Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get the highlight coordinates 


CCRWDoc.GetHighlights(Fieldld) 
Get field highlights from the 
CMasterDoc 


CMasterDoc. 

GetHighlights(Fieldld) 


frmEMSub.SetHighlight(Highlight 
Array) 






frmEMSub.RefreshO 
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Event: Check Box Changed 



Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetFieldfFieldld, 

Value) 
Update the CMasterDoc 


CMasterDoc.SetField(Fieldld, 
Value) 


frmDemog.DirtyFlag = TRUE 






Event: Sub Componenets Tab Pushed 


Gui Action 


COM Object Method 


Base Object Method 


frm{Component}.Show() 






Section: ICD9 Codes 
Event: Highlight Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get the highlight coordinates 


CCRWDocGetHighlights(Fieldld) 
Get field highlights from the 
CMasterDoc 


CMasterDoc. 

GetHighlights(Fieldld) 


frmlCD9.SetHighlight(HighlightArr 
ay) 






frmlCD9.Refresh() 






Event: Code Edit Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetlCD9Field(Positio 

n, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc. 

SetlCD9Field(Position, 
Fieldld, Value) 


frmlCD9.DirtyFlag = TRUE 






Event: Description Edit Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetlCD9Field(Positio 

n, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc. 

SetlCD9Field(Position, 
Fieldld, Value) 


frmlCD9.DirtyFlag = TRUE 







Event: Position Button Pushed 
I Gui Action 



COM Object Method 





Update the CMasterDoc 


Direction) 


Get the new values from the 
document object 


CCRWDoc.GetlCD9Fields() 
Get the fields from the 
CMasterDoc 


CMasterDoc.GetlCD9Fields() 


frmlCD9.refresh() 






frmlCD9.DirtyFlag=TRUE 






Event: Delete Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.DeletelCD9Pos(Positi 
on) 

Update the CMasterDoc 


CMasterDoc. 

DeletelCD9Pos(Position) 


Get the new values from the 
document object 


CCRWDoc.GetlCD9Fields() 
Get the fields from the 
CMasterDoc 


CMasterDoc.GetlCD9Fields() 


frmlCD9.Refresh() 






frmlCD9.DirtyFlag=TRUE 






Event: Lookup Button Pushec 




Gui Action 


COM Object Method 


Base Object Method 


Show the code lookup form 


CLookup.Show(Fieldld) 




Get the value selected by the 
user 


CLookup.GetFields(FieldldArray) 




Update code/description edit 
fields 






Update the document object 


CCRWDoc.SetlCD9Field(Positio 

n, Value) 
Update the CMasterDoc 


CMasterDoc.SetlCD9Field(Positi 
on, Value) 


frmlCD9.DirtyFlag=TRUE 






Event: Undo Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get original values from the 
document object 


CCRWDoc.GetOriglCD9Fields() 
Get the fields from the 
CMasterDoc 


CMasterDoc.GetOriglCD9Fields() 


frmlCD9.DirtyFlag = FALSE 






frmlCD9.Refresh() 






Section: CPT Codes 
Event: Highlight Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get the highlight coordinates 


CCRWDoc.GetHighlights(Fieldld) 
Get field highlights from the 
CMasterDoc 


CMasterDoc. 

GetHighlights(Fieldld) 
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frmCPT.SetHighlight(HighlightArr 
ay) 






frmCPT.RefreshO 







Event: Code Edit Changed 



Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetCPTField(Position 

, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc. 

SetCPTField(Position, 
Fieldld, Value) 


frmCPT.DirtyFlag = TRUE 






Event: Description Edit Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetCPTField(Position 

, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc. 

SetCPTField(Position, 
Fieldld, Value) 


frmCPT.DirtyFlag = TRUE 






Event: Position Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.MoveCPT(Position, 

Direction) 
Update the CMasterDoc 


CMasterDoc.MoveCPT(Position, 
Direction) 


Get the new values from the 
document object 


CCRWDoc.GetCPTFields() 
Get the fields from the 
CMasterDoc 


CMasterDoc.GetCPTFieldsQ 


frmCPT.refresh() 






frmCPT.DirtyFlag = TRUE 






Event: Modifiers Edit Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetCPTField(Position 

, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc.SetCPTFieldPostitio 
n, Fieldld, Value) 


update edit field on CPT form 






frmCPT.DirtyFlag=TRUE 







Page 9 



Appendix D 



Event: Modifiers Lookup Button Pushed 



Gui Action 


COM Object Method 


Base Object Method 


frmCPTMods.OpenO 






Update the document object 


CCRWDoc.SetCPTFieid(Position 

, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc.SetCPTField(Positio 
n, Fieldld, Value) 


update edit field on CPT form 






frmCPT.DirtyFlag=TRUE 






Event: ICD9 Edit Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetCPTField(Position 

, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc.SetCPTField(Positio 
n, Fieldld, Value) 


frmCPT.DirtyFlag=TRUE 






Event: Delete Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.DeleteCPTPos(Positi 
on) 

Update the CMasterDoc 


CMasterDoc. 

DeleteCPTPos(Position) 


Get the new values from the 
document object 


CCRWDoc.GetCPTFields() 
Get the fields from the 
CMasterDoc 


CMasterDocGetCPTFieldsQ 


frmCPT.RefreshO 






frmCPT.DirtyFlag=TRUE 






Event: Lookup Button Pushed 




Gui Action 


COM Object Method 


Base Object Method 


Show the code lookup form 


CLookup.Show(Fieldld) 




Get the value selected by the 
user 


CLookup.GetFields(FieldldArray) 




Update code/description edit 
fields 






Update the document object 


CCRWDoc.SetCPTField(Position 

, Value) 
Update the CMasterDoc 


CMasterDoc.SetCPTField(Positio 
n, Value) 


frmCPT.DirtyFlag=TRUE 
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Event: Undo Button Pushed 



Gui Action 


COM Object Method 


Base Object Method 


Get original values from the 
document object 


CCRWDoc.GetOrigCPTFields() 
Get the fields from the 
CMasterDoc 


CMasterDoc.GetOrigCPTFieldsQ 


frmCPT.DirtyFlag = FALSE 






frmCPT.RefreshO 






Section: CPT Modifiers Closeup (Lookup) 
Event: Code Combo Box Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetCPTField(Position 

, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc. 

SetCPTModField(Positio 
n, Fieldld, Value) 


frmCPTMod.DirtyFlag = TRUE 






Event: Description Edit Changed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.SetCPTField(Position 

, Fieldld, Value) 
Update the CMasterDoc 


CMasterDoc. 

SetCPTModField(Positio 
n ( Fieldld, Value) 


frmCPTMod.DirtyFlag = TRUE 






Event: Position Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.MoveCPTMod 

(Position, Direction) 
Update the CMasterDoc 


CMasterDoc.MoveCPTMod 
(Position, Direction) 


Get the new values from the 
document object 


CCRWDoc.GetCPTModFields() 
Get the fields from the 
CMasterDoc 


CMasterDoc.GetCPTModFieldsQ 


frmCPTMod.refreshO 






frmCPTMod.DirtyFlag = TRUE 






Event: Delete Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Update the document object 


CCRWDoc.DeleteCPTMod(Positi 
on) 

Update the CMasterDoc 


CMasterDoc. 

DeleteCPTModPos(Positi 
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on) 


Get the new values from the 
document object 


CCRWDoc.GetCPTModFields() 
Get the fields from the . 
CMasterDoc 


CMasterDoc.GetCPTModFieldsQ 


frmCPTMod.RefreshO 






frmCPTMod.DirtyFlag=TRUE 






Event: OK Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


frmCPTMods.HideO 






return(OK) 






frmCPT.RefreshQ 






Event: Cancel Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get original values from the 
document object 


CCRWDoc.GetOrigCPTFields(Fi 

eldldArray) 
Get the fields from the 

CMasterDoc 


CMasterDoc.GetOrigCPTFields(F 
ield Id Array) 


frmCPT.DirtyFlag = FALSE 






frmCPTMods.HideO 






return(CANCEL) 






Event: Undo Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Get original values from the 
document object 


CCRWDoc.GetOrigCPTFields() 
Get the fields from the 
CMasterDoc 


CMasterDocGetOrigCPTFieldsQ 


frmCPT.DirtyFlag = FALSE 






frmCPT.RefreshQ 






Section: Print Box 
Event: Option Button Changed 


Gui Action 


COM Object Method 


Base Object Method 


{No action} 






Event: Print Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Determine the print option 
selected 






frmCRWDoc.Print(Option) 
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Section: Transcription 
Event: Find Start Button Pushed 



Gui Action 


COM Object Method 


Base Object Method 


set cursor to start of first highlght 
value 






frmTranscript.RefreshO 






Event: Find End Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


set cursor to end of last highlght 
value 






f rmTranscri pt. Refresh () 






Event: Turn Off Trace Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


frmTranscript.SetHighlight(NULL) 






frmTranscript.RefreshO 






Display "Turn On Trace" button 






Event: Turn On Trace Button Pushed 


Gui Action 


COM Object Method 


Base Object Method 


Display "Turn Off Trace" button 
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